From: Paul Eggert <eggert@cs.ucla.edu>
Date: Wed, 16 Mar 2011 07:19:04 +0000 (-0700)
Subject: * callint.c (quotify_arg, quotify_args): Now static.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~4366^2~39
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=074b5897ee5ab18b80ef2caf11fc2722a3edd375;p=emacs.git

* callint.c (quotify_arg, quotify_args): Now static.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 9f660d23109..b8bfae527af 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,7 @@
 2011-03-16  Paul Eggert  <eggert@cs.ucla.edu>
 
+	* callint.c (quotify_arg, quotify_args): Now static.
+
 	* lisp.h (get_system_name, get_operating_system_release):
 	Move decls here, to check interfaces.
 	* process.c (get_operating_system_release): Move decl to lisp.h.
diff --git a/src/callint.c b/src/callint.c
index 21dd3cd4d9d..af9ee5bb9bd 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -118,7 +118,7 @@ usage: (interactive &optional ARGS)  */)
 
 /* Quotify EXP: if EXP is constant, return it.
    If EXP is not constant, return (quote EXP).  */
-Lisp_Object
+static Lisp_Object
 quotify_arg (register Lisp_Object exp)
 {
   if (!INTEGERP (exp) && !STRINGP (exp)
@@ -129,7 +129,7 @@ quotify_arg (register Lisp_Object exp)
 }
 
 /* Modify EXP by quotifying each element (except the first).  */
-Lisp_Object
+static Lisp_Object
 quotify_args (Lisp_Object exp)
 {
   register Lisp_Object tail;